home *** CD-ROM | disk | FTP | other *** search
- object PicView: TPicView
- Left = 237
- Top = 37
- BorderIcons = []
- BorderStyle = bsSingle
- Caption = 'Gif View'
- ClientHeight = 347
- ClientWidth = 384
- Color = clSilver
- Font.Color = clWindowText
- Font.Height = -14
- Font.Name = 'System'
- Font.Style = []
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 16
- object GIFImage1: tGIFImage
- Left = 0
- Top = 0
- Width = 384
- Height = 288
- Align = alClient
- Center = True
- Stretch = True
- Visible = False
- GIFSizeOnly = False
- end
- object Panel1: TPanel
- Left = 0
- Top = 318
- Width = 384
- Height = 29
- Align = alBottom
- TabOrder = 0
- object BitBtn1: TBitBtn
- Left = 9
- Top = 5
- Width = 181
- Height = 20
- Caption = 'Browse'
- TabOrder = 0
- OnClick = BitBtn1Click
- end
- object BitBtn2: TBitBtn
- Left = 194
- Top = 5
- Width = 180
- Height = 20
- TabOrder = 1
- OnClick = BitBtn2Click
- Kind = bkClose
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 288
- Width = 384
- Height = 30
- Align = alBottom
- TabOrder = 1
- object Label1: TLabel
- Left = 6
- Top = 7
- Width = 180
- Height = 16
- Alignment = taCenter
- AutoSize = False
- Caption = 'Width: 0'
- Font.Color = clBlue
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 198
- Top = 7
- Width = 180
- Height = 16
- Alignment = taCenter
- AutoSize = False
- Caption = 'Height: 0'
- Font.Color = clBlue
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = [fsBold]
- ParentFont = False
- end
- end
- object OpenDialog1: TOpenDialog
- FileEditStyle = fsEdit
- Filter = 'GIF Files|*.gif'
- Options = [ofReadOnly, ofHideReadOnly, ofPathMustExist, ofFileMustExist]
- Left = 8
- Top = 304
- end
- end
-